An Invitation to the Roland World of Music/Roland - An Invitation To The Roland World Of Music.bin/vb/vb30/disk1/main2.fr_/main2.bin

Text File | 1993-04-27 | 2KB | 84 lines

VERSION 2.00
Begin Form frmMain
   Caption         =   "Control Examples"
   Height          =   3840
   Left            =   1500
   LinkTopic       =   "Form2"
   ScaleHeight     =   3150
   ScaleWidth      =   4965
   Top             =   1380
   Width           =   5085
   Begin CommandButton cmdExit
      Caption         =   "E&xit"
      Height          =   495
      Left            =   3240
      TabIndex        =   0
      Top             =   2160
      Width           =   1215
   End
   Begin Menu mnuControls
      Caption         =   "&Options"
      Begin Menu mnuButtons
         Caption         =   "&Test Buttons"
      End
      Begin Menu mnuWordWrap
         Caption         =   "&WordWrap and Autosize"
      End
      Begin Menu mnuCheck
         Caption         =   "&Check Box"
      End
      Begin Menu mnuNumber
         Caption         =   "&Number System"
      End
      Begin Menu mnuListBox
         Caption         =   "&List Box"
      End
      Begin Menu mnuMulti
         Caption         =   "&Multi-column List Box"
      End
      Begin Menu mnuScrollBars
         Caption         =   "&Scroll Bars"
      End
      Begin Menu mnuArray
         Caption         =   "Control &Array"
      End
   End
End

Sub cmdExit_Click ()
    End
End Sub

Sub mnuArray_Click ()
    frmControlArray.Show
End Sub

Sub mnuButtons_Click ()
    frmButton.Show
End Sub

Sub mnuCheck_Click ()
    frmCheck.Show
End Sub

Sub mnuListBox_Click ()
    frmListBox.Show
End Sub

Sub mnuMulti_Click ()
    frmMulti.Show
End Sub

Sub mnuNumber_Click ()
    frmNumber.Show
End Sub

Sub mnuScrollBars_Click ()
    frmScrollBars.Show
End Sub

Sub mnuWordWrap_Click ()
    frmWordWrap.Show
End Sub